home *** CD-ROM | disk | FTP | other *** search
/ Flybox Trout (Edition 1) / Flybox Trout (Edition 1).iso / Setup / Support / FlyBox.swf / scripts / DefineSprite_300 / frame_17 / DoAction.as
Encoding:
Text File  |  2002-04-15  |  461 b   |  30 lines
  1. cont = true;
  2. if(StartIt == true)
  3. {
  4.    a = 0;
  5.    StartIt = false;
  6. }
  7. else
  8. {
  9.    a += 1;
  10. }
  11. do
  12. {
  13.    if(eval("_root:SendAnecdote" + a) == true)
  14.    {
  15.       cont = false;
  16.       b += 1;
  17.    }
  18.    else
  19.    {
  20.       a += 1;
  21.    }
  22. }
  23. while(cont == true);
  24.  
  25. UploadingText = "UPLOADING " + b + " OF " + SendCount;
  26. Anecdote = eval("_root:UAnecdote" + a);
  27. FlyName = eval("_root:UFly" + a);
  28. FlyID = eval("_root:UFlyID" + a);
  29. getUrl("UploadAnecdotes", "");
  30.